home *** CD-ROM | disk | FTP | other *** search
/ SGI Hot Mix 17 / Hot Mix 17.iso / HM17_SGI / research / lib / insput.pro < prev    next >
Text File  |  1997-07-08  |  991b  |  36 lines
  1. ; $Id: insput.pro,v 1.2 1997/01/15 03:11:50 ali Exp $
  2. ;
  3. ; Copyright (c) 1996-1997, Research Systems, Inc.  All rights reserved.
  4. ;       Unauthorized reproduction prohibited.
  5. ;
  6. ;+
  7. ; NAME:
  8. ;       INSPUT
  9. ;
  10. ; PURPOSE:
  11. ;       Stub for INSPUT.  Displays message saying that insight must be running.
  12. ;        Once Insight is restored and running this routine will be replaced by
  13. ;        the actual compiled version in the insight save file.
  14. ;
  15. ; CALLING SEQUENCE:
  16. ;       INSPUT
  17. ;
  18. ; DEVELOPMENT NOTES:
  19. ;        - 
  20. ;
  21. ;------------------------------------------------------------------------------
  22. pro InsPut, $
  23.     arg1,  arg2,  arg3,  arg4,  arg5, $
  24.     arg6,  arg7,  arg8,  arg9,  arg10, $
  25.     arg11, arg12, arg13, arg14, arg15, $
  26.     arg16, arg17, arg18, arg19, arg20, $
  27.     arg21, arg22, arg23, arg24, arg25, $
  28.     _EXTRA=extra
  29.  
  30.     ; Notify user that Insight must be running to use this function
  31.     ;
  32.     result = DIALOG_MESSAGE($
  33.         ['Insight must be running in order to use InsPut.', $
  34.           'Please start Insight and try again.'] )
  35. end
  36.